home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 February / EnigmA AMIGA RUN 15 (1997)(G.R. Edizioni)(IT)[!][issue 1997-02][PLANET CD V].iso / enigma / earcd / emula / arosdv19.lha / AROS / exec / remlibrary.c < prev    next >
C/C++ Source or Header  |  1996-10-24  |  2KB  |  79 lines
  1. /*
  2.     (C) 1995-96 AROS - The Amiga Replacement OS
  3.     $Id: remlibrary.c,v 1.5 1996/10/24 15:50:55 aros Exp $
  4.     $Log: remlibrary.c,v $
  5.     Revision 1.5  1996/10/24 15:50:55  aros
  6.     Use the official AROS macros over the __AROS versions.
  7.  
  8.     Revision 1.4  1996/08/13 13:56:06  digulla
  9.     Replaced AROS_LA by AROS_LHA
  10.     Replaced some AROS_LH*I by AROS_LH*
  11.     Sorted and added includes
  12.  
  13.     Revision 1.3  1996/08/01 17:41:16  digulla
  14.     Added standard header for all files
  15.  
  16.     Desc:
  17.     Lang: english
  18. */
  19. #include <exec/execbase.h>
  20. #include <aros/libcall.h>
  21. #include <dos/dos.h>
  22.  
  23. /*****************************************************************************
  24.  
  25.     NAME */
  26.     #include <clib/exec_protos.h>
  27.  
  28.     AROS_LH1(void, RemLibrary,
  29.  
  30. /*  SYNOPSIS */
  31.     AROS_LHA(struct Library *, library,A1),
  32.  
  33. /*  LOCATION */
  34.     struct ExecBase *, SysBase, 67, Exec)
  35.  
  36. /*  FUNCTION
  37.     Calls the given library's expunge vector, thus trying to delete it.
  38.     The library may refuse to do so and still be open after this call.
  39.  
  40.     INPUTS
  41.     library - Pointer to the library structure.
  42.  
  43.     RESULT
  44.  
  45.     NOTES
  46.  
  47.     EXAMPLE
  48.  
  49.     BUGS
  50.  
  51.     SEE ALSO
  52.     AddLibrary(), MakeLibrary(), MakeFunctions(), InitStruct(), SumLibrary().
  53.  
  54.     INTERNALS
  55.  
  56.     HISTORY
  57.  
  58. ******************************************************************************/
  59. {
  60.     AROS_LIBFUNC_INIT
  61.  
  62.     /* Arbitrate for the library list */
  63.     Forbid();
  64.  
  65.     /* Call expunge vector */
  66.     (void)AROS_LVO_CALL0(BPTR,struct Library *,library,3,);
  67.     /*
  68.     Normally you'd expect the library to be expunged if this returns
  69.     non-zero, but this is only exec which doesn't know anything about
  70.     seglists - therefore dos.library has to SetFunction() into this
  71.     vector for the additional functionality.
  72.     */
  73.  
  74.     /* All done. */
  75.     Permit();
  76.     AROS_LIBFUNC_EXIT
  77. } /* RemLibrary */
  78.  
  79.